Delphi Magazine Collection 2001/Delphi Magazine Collection 20001 (2001).iso/DISKS/Issue25/system/UFINDER.DFM/UFINDER.txt

Text File | 1997-08-06 | 4.2 KB | 216 lines

object Form1: TForm1
  Left = 192
  Top = 155
  BorderStyle = bsDialog
  Caption = 'TreeFind Testbed'
  ClientHeight = 359
  ClientWidth = 632
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Position = poScreenCenter
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 8
    Top = 16
    Width = 47
    Height = 13
    Caption = '&File Spec:'
    FocusControl = FileSpec
  end
  object Bevel1: TBevel
    Left = 265
    Top = 16
    Width = 8
    Height = 329
    Shape = bsLeftLine
  end
  object ListBox1: TListBox
    Left = 284
    Top = 39
    Width = 333
    Height = 266
    ItemHeight = 13
    Style = lbOwnerDrawFixed
    TabOrder = 0
    OnDblClick = ListBox1DblClick
    OnDrawItem = ListBox1DrawItem
  end
  object FileSpec: TEdit
    Left = 71
    Top = 11
    Width = 178
    Height = 21
    TabOrder = 1
    OnChange = FileSpecChange
  end
  object Go: TBitBtn
    Left = 341
    Top = 322
    Width = 75
    Height = 25
    Caption = '&Go!'
    Default = True
    TabOrder = 2
    OnClick = GoClick
  end
  object GroupBox1: TGroupBox
    Left = 13
    Top = 42
    Width = 236
    Height = 127
    Caption = ' Drives to Search '
    TabOrder = 3
    object CheckBox1: TCheckBox
      Tag = 8
      Left = 14
      Top = 20
      Width = 97
      Height = 17
      Caption = 'Default Drive'
      TabOrder = 0
      OnClick = CheckBox1Click
    end
    object CheckBox2: TCheckBox
      Tag = 16
      Left = 14
      Top = 37
      Width = 203
      Height = 17
      Caption = 'Removable Drives (e.g. floppies)'
      TabOrder = 1
      OnClick = CheckBox1Click
    end
    object CheckBox3: TCheckBox
      Tag = 32
      Left = 14
      Top = 53
      Width = 187
      Height = 17
      Caption = 'Fixed Drives (e.g. hard disks)'
      TabOrder = 2
      OnClick = CheckBox1Click
    end
    object CheckBox4: TCheckBox
      Tag = 64
      Left = 14
      Top = 70
      Width = 163
      Height = 17
      Caption = 'Remote (networked) Drives'
      TabOrder = 3
      OnClick = CheckBox1Click
    end
    object CheckBox5: TCheckBox
      Tag = 128
      Left = 14
      Top = 86
      Width = 97
      Height = 17
      Caption = 'CD-ROM Drives'
      TabOrder = 4
      OnClick = CheckBox1Click
    end
    object CheckBox6: TCheckBox
      Tag = 256
      Left = 14
      Top = 103
      Width = 97
      Height = 17
      Caption = 'RAM Disks'
      TabOrder = 5
      OnClick = CheckBox1Click
    end
  end
  object GroupBox2: TGroupBox
    Left = 13
    Top = 186
    Width = 236
    Height = 79
    Caption = ' Include These File Types in Search '
    TabOrder = 4
    object CheckBox7: TCheckBox
      Tag = 1
      Left = 14
      Top = 20
      Width = 97
      Height = 17
      Caption = 'Read-Only Files'
      TabOrder = 0
      OnClick = CheckBox1Click
    end
    object CheckBox8: TCheckBox
      Tag = 4
      Left = 14
      Top = 52
      Width = 97
      Height = 17
      Caption = 'System Files'
      TabOrder = 1
      OnClick = CheckBox1Click
    end
    object CheckBox9: TCheckBox
      Tag = 2
      Left = 14
      Top = 36
      Width = 97
      Height = 17
      Caption = 'Hidden Files'
      TabOrder = 2
      OnClick = CheckBox1Click
    end
  end
  object Button1: TButton
    Left = 484
    Top = 322
    Width = 75
    Height = 25
    Cancel = True
    Caption = 'E&xit'
    TabOrder = 5
    OnClick = Button1Click
  end
  object GroupBox3: TGroupBox
    Left = 13
    Top = 279
    Width = 236
    Height = 58
    Caption = ' Misc Options '
    TabOrder = 6
    object CheckBox10: TCheckBox
      Tag = 32768
      Left = 14
      Top = 17
      Width = 195
      Height = 17
      Caption = 'Include &ZIP Files in Search'
      TabOrder = 0
      OnClick = CheckBox1Click
    end
    object CheckBox11: TCheckBox
      Tag = 16384
      Left = 14
      Top = 33
      Width = 179
      Height = 17
      Caption = 'Search ONLY Zip Files'
      TabOrder = 1
      OnClick = CheckBox1Click
    end
  end
  object Header1: THeader
    Left = 284
    Top = 15
    Width = 333
    Height = 25
    Sections.Sections = (
      #0'74'#0' Matching File'
      #0'76'#0' ZIP Container')
    TabOrder = 7
    OnSized = Header1Sized
  end
end